home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 49 / Amiga Format CD49 (2000-01-17)(Future Publishing)(GB)(Track 1 of 3)[!][issue 2000-02].iso / -readerstuff- / paul_bray / e-stuff / examples / swapvaltest.e < prev   
Text File  |  1999-11-30  |  127b  |  10 lines

  1.  
  2. MODULE 'pauls/swapval'
  3.  
  4. PROC main()
  5. DEF a=7, b=8
  6. WriteF('a=\d b=\d\n',a,b)
  7. swapval({a},{b})
  8. WriteF('a=\d b=\d\n',a,b)
  9. ENDPROC
  10.